dessin("Boucles en
r
et
a
","L.R") ; // Version du 23/11/2016. curseur("Rmax",1,5,0.1,2) ; curseur("bleu",0,255,5,125); Repère.unité_angle = "deg" ; // Alors valable pour tous les angles des repères. repère_1 = nouveau.repère(largeur/2, hauteur/2,100,0); corail = RVB(255,127,80) ; // Voir www.rapidtables.com/web/color/orange-color.htm cadence(40) ; // La fonction dessiner sera exécutée 40 fois/s. //------------------------------------------------------------------------------------------------------------ dessiner = function() { // Exécutée à la cadence prédéfinie. //------------------------------------------------------------------------------------------------------------ var r, a, b = 10*(numImage % 25), C = [0,0], P = [0,0] ; // C et P : deux points. épaisseur(1) ; couleur(128) ; fond(corail) ; // fond pour la toile. for(r = 0 ; r < Rmax ; r += 0.2) // Boucle sur r. { coloriage(0,100,b,32) ; cercle(C,r,repère_1) }; épaisseur(8); for(a = 0 ; a < 2*PI ; a += 0.15) // Boucle sur a. { P[0] = C[0] + Rmax*cos(a) ; P[1] = C[1] + Rmax*sin(a); couleur(255,255,255,32) ; segment(C,P,repère_1); couleur(b,0,bleu) ; cercle(P,0.2,repère_1); }; }; // ------------------------------ FIN de la fonction de dessin dynamique. ---------------------------------